      module mo_adjrxt
      private
      public :: adjrxt
      contains
      subroutine adjrxt( rate, inv, m, ncol, nlev )
      use shr_kind_mod, only : r8 => shr_kind_r8
      use chem_mods, only : nfs, rxntot
      implicit none
!--------------------------------------------------------------------
! ... dummy arguments
!--------------------------------------------------------------------
      integer, intent(in) :: ncol, nlev
      real(r8), intent(in) :: inv(ncol,nlev,nfs)
      real(r8), intent(in) :: m(ncol,nlev)
      real(r8), intent(inout) :: rate(ncol,nlev,rxntot)
      rate(:,:,102) = rate(:,:,102) * inv(:,:, 1)
      rate(:,:,103) = rate(:,:,103) * inv(:,:, 1)
      rate(:,:,113) = rate(:,:,113) * inv(:,:, 1)
      rate(:,:,114) = rate(:,:,114) * inv(:,:, 1)
      rate(:,:,128) = rate(:,:,128) * inv(:,:, 2)
      rate(:,:,130) = rate(:,:,130) * inv(:,:, 1)
      rate(:,:,132) = rate(:,:,132) * inv(:,:, 2)
      rate(:,:,253) = rate(:,:,253) * inv(:,:, 1)
      rate(:,:,254) = rate(:,:,254) * inv(:,:, 1)
      rate(:,:,255) = rate(:,:,255) * inv(:,:, 1)
      rate(:,:,256) = rate(:,:,256) * inv(:,:, 1)
      rate(:,:,257) = rate(:,:,257) * inv(:,:, 1)
      rate(:,:,258) = rate(:,:,258) * inv(:,:, 1)
      rate(:,:,259) = rate(:,:,259) * inv(:,:, 1)
      rate(:,:,260) = rate(:,:,260) * inv(:,:, 1)
      rate(:,:,261) = rate(:,:,261) * inv(:,:, 1)
      rate(:,:,262) = rate(:,:,262) * inv(:,:, 1)
      rate(:,:,263) = rate(:,:,263) * inv(:,:, 1)
      rate(:,:,264) = rate(:,:,264) * inv(:,:, 1)
      rate(:,:,265) = rate(:,:,265) * inv(:,:, 1)
      rate(:,:,266) = rate(:,:,266) * inv(:,:, 1)
      rate(:,:,268) = rate(:,:,268) * inv(:,:, 1)
      rate(:,:,269) = rate(:,:,269) * inv(:,:, 1)
      rate(:,:,270) = rate(:,:,270) * inv(:,:, 1)
      rate(:,:,271) = rate(:,:,271) * inv(:,:, 1)
      rate(:,:,277) = rate(:,:,277) * inv(:,:, 1)
      rate(:,:,278) = rate(:,:,278) * inv(:,:, 1)
      rate(:,:,279) = rate(:,:,279) * inv(:,:, 1)
      rate(:,:,283) = rate(:,:,283) * inv(:,:, 1)
      rate(:,:,289) = rate(:,:,289) * inv(:,:, 1)
      rate(:,:,291) = rate(:,:,291) * inv(:,:, 1)
      rate(:,:,295) = rate(:,:,295) * inv(:,:, 1)
      rate(:,:,311) = rate(:,:,311) * inv(:,:, 1)
      rate(:,:,317) = rate(:,:,317) * inv(:,:, 1)
      rate(:,:,324) = rate(:,:,324) * inv(:,:, 1)
      rate(:,:,338) = rate(:,:,338) * inv(:,:, 1)
      rate(:,:,344) = rate(:,:,344) * inv(:,:, 1)
      rate(:,:,347) = rate(:,:,347) * inv(:,:, 1)
      rate(:,:,353) = rate(:,:,353) * inv(:,:, 1)
      rate(:,:,357) = rate(:,:,357) * inv(:,:, 1)
      rate(:,:,359) = rate(:,:,359) * inv(:,:, 1)
      rate(:,:,360) = rate(:,:,360) * inv(:,:, 1)
      rate(:,:,361) = rate(:,:,361) * inv(:,:, 1)
      rate(:,:,362) = rate(:,:,362) * inv(:,:, 1)
      rate(:,:,363) = rate(:,:,363) * inv(:,:, 1)
      rate(:,:,364) = rate(:,:,364) * inv(:,:, 1)
      rate(:,:,366) = rate(:,:,366) * inv(:,:, 1)
      rate(:,:,367) = rate(:,:,367) * inv(:,:, 1)
      rate(:,:,368) = rate(:,:,368) * inv(:,:, 1)
      rate(:,:,369) = rate(:,:,369) * inv(:,:, 1)
      rate(:,:,370) = rate(:,:,370) * inv(:,:, 1)
      rate(:,:,371) = rate(:,:,371) * inv(:,:, 1)
      rate(:,:,372) = rate(:,:,372) * inv(:,:, 1)
      rate(:,:,373) = rate(:,:,373) * inv(:,:, 1)
      rate(:,:,374) = rate(:,:,374) * inv(:,:, 1)
      rate(:,:,380) = rate(:,:,380) * inv(:,:, 1)
      rate(:,:,381) = rate(:,:,381) * inv(:,:, 1)
      rate(:,:,386) = rate(:,:,386) * inv(:,:, 2)
      rate(:,:,390) = rate(:,:,390) * inv(:,:, 2)
      rate(:,:,394) = rate(:,:,394) * inv(:,:, 2)
      rate(:,:,399) = rate(:,:,399) * inv(:,:, 1)
      rate(:,:,400) = rate(:,:,400) * inv(:,:, 1)
      rate(:,:,406) = rate(:,:,406) * inv(:,:, 1)
      rate(:,:,416) = rate(:,:,416) * inv(:,:, 1)
      rate(:,:,428) = rate(:,:,428) * inv(:,:, 1)
      rate(:,:,436) = rate(:,:,436) * inv(:,:, 1)
      rate(:,:,439) = rate(:,:,439) * inv(:,:, 1)
      rate(:,:,440) = rate(:,:,440) * inv(:,:, 1)
      rate(:,:,441) = rate(:,:,441) * inv(:,:, 1)
      rate(:,:,443) = rate(:,:,443) * inv(:,:, 1)
      rate(:,:,444) = rate(:,:,444) * inv(:,:, 1)
      rate(:,:,459) = rate(:,:,459) * inv(:,:, 1)
      rate(:,:,479) = rate(:,:,479) * inv(:,:, 1)
      rate(:,:,480) = rate(:,:,480) * inv(:,:, 1)
      rate(:,:,490) = rate(:,:,490) * inv(:,:, 1)
      rate(:,:,532) = rate(:,:,532) * inv(:,:, 1)
      rate(:,:,571) = rate(:,:,571) * inv(:,:, 2)
      rate(:,:,574) = rate(:,:,574) * inv(:,:, 2)
      rate(:,:,578) = rate(:,:,578) * inv(:,:, 2)
      rate(:,:,583) = rate(:,:,583) * inv(:,:, 2)
      rate(:,:,584) = rate(:,:,584) * inv(:,:, 2)
      rate(:,:,365) = rate(:,:,365) * inv(:,:, 2) * inv(:,:, 1)
      rate(:,:,100) = rate(:,:,100) * m(:,:)
      rate(:,:,101) = rate(:,:,101) * m(:,:)
      rate(:,:,102) = rate(:,:,102) * m(:,:)
      rate(:,:,103) = rate(:,:,103) * m(:,:)
      rate(:,:,104) = rate(:,:,104) * m(:,:)
      rate(:,:,105) = rate(:,:,105) * m(:,:)
      rate(:,:,106) = rate(:,:,106) * m(:,:)
      rate(:,:,107) = rate(:,:,107) * m(:,:)
      rate(:,:,108) = rate(:,:,108) * m(:,:)
      rate(:,:,109) = rate(:,:,109) * m(:,:)
      rate(:,:,110) = rate(:,:,110) * m(:,:)
      rate(:,:,111) = rate(:,:,111) * m(:,:)
      rate(:,:,112) = rate(:,:,112) * m(:,:)
      rate(:,:,113) = rate(:,:,113) * m(:,:)
      rate(:,:,114) = rate(:,:,114) * m(:,:)
      rate(:,:,115) = rate(:,:,115) * m(:,:)
      rate(:,:,116) = rate(:,:,116) * m(:,:)
      rate(:,:,117) = rate(:,:,117) * m(:,:)
      rate(:,:,118) = rate(:,:,118) * m(:,:)
      rate(:,:,119) = rate(:,:,119) * m(:,:)
      rate(:,:,120) = rate(:,:,120) * m(:,:)
      rate(:,:,121) = rate(:,:,121) * m(:,:)
      rate(:,:,122) = rate(:,:,122) * m(:,:)
      rate(:,:,123) = rate(:,:,123) * m(:,:)
      rate(:,:,124) = rate(:,:,124) * m(:,:)
      rate(:,:,125) = rate(:,:,125) * m(:,:)
      rate(:,:,126) = rate(:,:,126) * m(:,:)
      rate(:,:,127) = rate(:,:,127) * m(:,:)
      rate(:,:,128) = rate(:,:,128) * m(:,:)
      rate(:,:,129) = rate(:,:,129) * m(:,:)
      rate(:,:,130) = rate(:,:,130) * m(:,:)
      rate(:,:,131) = rate(:,:,131) * m(:,:)
      rate(:,:,133) = rate(:,:,133) * m(:,:)
      rate(:,:,134) = rate(:,:,134) * m(:,:)
      rate(:,:,135) = rate(:,:,135) * m(:,:)
      rate(:,:,136) = rate(:,:,136) * m(:,:)
      rate(:,:,137) = rate(:,:,137) * m(:,:)
      rate(:,:,138) = rate(:,:,138) * m(:,:)
      rate(:,:,139) = rate(:,:,139) * m(:,:)
      rate(:,:,140) = rate(:,:,140) * m(:,:)
      rate(:,:,141) = rate(:,:,141) * m(:,:)
      rate(:,:,142) = rate(:,:,142) * m(:,:)
      rate(:,:,143) = rate(:,:,143) * m(:,:)
      rate(:,:,144) = rate(:,:,144) * m(:,:)
      rate(:,:,145) = rate(:,:,145) * m(:,:)
      rate(:,:,146) = rate(:,:,146) * m(:,:)
      rate(:,:,147) = rate(:,:,147) * m(:,:)
      rate(:,:,148) = rate(:,:,148) * m(:,:)
      rate(:,:,149) = rate(:,:,149) * m(:,:)
      rate(:,:,150) = rate(:,:,150) * m(:,:)
      rate(:,:,151) = rate(:,:,151) * m(:,:)
      rate(:,:,152) = rate(:,:,152) * m(:,:)
      rate(:,:,153) = rate(:,:,153) * m(:,:)
      rate(:,:,154) = rate(:,:,154) * m(:,:)
      rate(:,:,155) = rate(:,:,155) * m(:,:)
      rate(:,:,156) = rate(:,:,156) * m(:,:)
      rate(:,:,157) = rate(:,:,157) * m(:,:)
      rate(:,:,158) = rate(:,:,158) * m(:,:)
      rate(:,:,159) = rate(:,:,159) * m(:,:)
      rate(:,:,160) = rate(:,:,160) * m(:,:)
      rate(:,:,161) = rate(:,:,161) * m(:,:)
      rate(:,:,162) = rate(:,:,162) * m(:,:)
      rate(:,:,163) = rate(:,:,163) * m(:,:)
      rate(:,:,164) = rate(:,:,164) * m(:,:)
      rate(:,:,165) = rate(:,:,165) * m(:,:)
      rate(:,:,166) = rate(:,:,166) * m(:,:)
      rate(:,:,167) = rate(:,:,167) * m(:,:)
      rate(:,:,168) = rate(:,:,168) * m(:,:)
      rate(:,:,169) = rate(:,:,169) * m(:,:)
      rate(:,:,170) = rate(:,:,170) * m(:,:)
      rate(:,:,171) = rate(:,:,171) * m(:,:)
      rate(:,:,172) = rate(:,:,172) * m(:,:)
      rate(:,:,173) = rate(:,:,173) * m(:,:)
      rate(:,:,174) = rate(:,:,174) * m(:,:)
      rate(:,:,175) = rate(:,:,175) * m(:,:)
      rate(:,:,176) = rate(:,:,176) * m(:,:)
      rate(:,:,177) = rate(:,:,177) * m(:,:)
      rate(:,:,178) = rate(:,:,178) * m(:,:)
      rate(:,:,179) = rate(:,:,179) * m(:,:)
      rate(:,:,180) = rate(:,:,180) * m(:,:)
      rate(:,:,181) = rate(:,:,181) * m(:,:)
      rate(:,:,182) = rate(:,:,182) * m(:,:)
      rate(:,:,183) = rate(:,:,183) * m(:,:)
      rate(:,:,184) = rate(:,:,184) * m(:,:)
      rate(:,:,185) = rate(:,:,185) * m(:,:)
      rate(:,:,186) = rate(:,:,186) * m(:,:)
      rate(:,:,187) = rate(:,:,187) * m(:,:)
      rate(:,:,188) = rate(:,:,188) * m(:,:)
      rate(:,:,189) = rate(:,:,189) * m(:,:)
      rate(:,:,190) = rate(:,:,190) * m(:,:)
      rate(:,:,191) = rate(:,:,191) * m(:,:)
      rate(:,:,192) = rate(:,:,192) * m(:,:)
      rate(:,:,193) = rate(:,:,193) * m(:,:)
      rate(:,:,194) = rate(:,:,194) * m(:,:)
      rate(:,:,195) = rate(:,:,195) * m(:,:)
      rate(:,:,196) = rate(:,:,196) * m(:,:)
      rate(:,:,197) = rate(:,:,197) * m(:,:)
      rate(:,:,198) = rate(:,:,198) * m(:,:)
      rate(:,:,199) = rate(:,:,199) * m(:,:)
      rate(:,:,200) = rate(:,:,200) * m(:,:)
      rate(:,:,201) = rate(:,:,201) * m(:,:)
      rate(:,:,202) = rate(:,:,202) * m(:,:)
      rate(:,:,203) = rate(:,:,203) * m(:,:)
      rate(:,:,204) = rate(:,:,204) * m(:,:)
      rate(:,:,205) = rate(:,:,205) * m(:,:)
      rate(:,:,206) = rate(:,:,206) * m(:,:)
      rate(:,:,207) = rate(:,:,207) * m(:,:)
      rate(:,:,208) = rate(:,:,208) * m(:,:)
      rate(:,:,209) = rate(:,:,209) * m(:,:)
      rate(:,:,210) = rate(:,:,210) * m(:,:)
      rate(:,:,211) = rate(:,:,211) * m(:,:)
      rate(:,:,212) = rate(:,:,212) * m(:,:)
      rate(:,:,213) = rate(:,:,213) * m(:,:)
      rate(:,:,214) = rate(:,:,214) * m(:,:)
      rate(:,:,215) = rate(:,:,215) * m(:,:)
      rate(:,:,216) = rate(:,:,216) * m(:,:)
      rate(:,:,217) = rate(:,:,217) * m(:,:)
      rate(:,:,218) = rate(:,:,218) * m(:,:)
      rate(:,:,219) = rate(:,:,219) * m(:,:)
      rate(:,:,220) = rate(:,:,220) * m(:,:)
      rate(:,:,221) = rate(:,:,221) * m(:,:)
      rate(:,:,222) = rate(:,:,222) * m(:,:)
      rate(:,:,223) = rate(:,:,223) * m(:,:)
      rate(:,:,224) = rate(:,:,224) * m(:,:)
      rate(:,:,225) = rate(:,:,225) * m(:,:)
      rate(:,:,226) = rate(:,:,226) * m(:,:)
      rate(:,:,227) = rate(:,:,227) * m(:,:)
      rate(:,:,228) = rate(:,:,228) * m(:,:)
      rate(:,:,229) = rate(:,:,229) * m(:,:)
      rate(:,:,230) = rate(:,:,230) * m(:,:)
      rate(:,:,231) = rate(:,:,231) * m(:,:)
      rate(:,:,232) = rate(:,:,232) * m(:,:)
      rate(:,:,233) = rate(:,:,233) * m(:,:)
      rate(:,:,234) = rate(:,:,234) * m(:,:)
      rate(:,:,235) = rate(:,:,235) * m(:,:)
      rate(:,:,236) = rate(:,:,236) * m(:,:)
      rate(:,:,237) = rate(:,:,237) * m(:,:)
      rate(:,:,238) = rate(:,:,238) * m(:,:)
      rate(:,:,239) = rate(:,:,239) * m(:,:)
      rate(:,:,240) = rate(:,:,240) * m(:,:)
      rate(:,:,241) = rate(:,:,241) * m(:,:)
      rate(:,:,242) = rate(:,:,242) * m(:,:)
      rate(:,:,243) = rate(:,:,243) * m(:,:)
      rate(:,:,244) = rate(:,:,244) * m(:,:)
      rate(:,:,245) = rate(:,:,245) * m(:,:)
      rate(:,:,246) = rate(:,:,246) * m(:,:)
      rate(:,:,247) = rate(:,:,247) * m(:,:)
      rate(:,:,248) = rate(:,:,248) * m(:,:)
      rate(:,:,249) = rate(:,:,249) * m(:,:)
      rate(:,:,250) = rate(:,:,250) * m(:,:)
      rate(:,:,251) = rate(:,:,251) * m(:,:)
      rate(:,:,252) = rate(:,:,252) * m(:,:)
      rate(:,:,253) = rate(:,:,253) * m(:,:)
      rate(:,:,254) = rate(:,:,254) * m(:,:)
      rate(:,:,255) = rate(:,:,255) * m(:,:)
      rate(:,:,256) = rate(:,:,256) * m(:,:)
      rate(:,:,257) = rate(:,:,257) * m(:,:)
      rate(:,:,258) = rate(:,:,258) * m(:,:)
      rate(:,:,259) = rate(:,:,259) * m(:,:)
      rate(:,:,260) = rate(:,:,260) * m(:,:)
      rate(:,:,261) = rate(:,:,261) * m(:,:)
      rate(:,:,262) = rate(:,:,262) * m(:,:)
      rate(:,:,263) = rate(:,:,263) * m(:,:)
      rate(:,:,264) = rate(:,:,264) * m(:,:)
      rate(:,:,265) = rate(:,:,265) * m(:,:)
      rate(:,:,266) = rate(:,:,266) * m(:,:)
      rate(:,:,267) = rate(:,:,267) * m(:,:)
      rate(:,:,271) = rate(:,:,271) * m(:,:)
      rate(:,:,272) = rate(:,:,272) * m(:,:)
      rate(:,:,273) = rate(:,:,273) * m(:,:)
      rate(:,:,274) = rate(:,:,274) * m(:,:)
      rate(:,:,275) = rate(:,:,275) * m(:,:)
      rate(:,:,276) = rate(:,:,276) * m(:,:)
      rate(:,:,280) = rate(:,:,280) * m(:,:)
      rate(:,:,281) = rate(:,:,281) * m(:,:)
      rate(:,:,282) = rate(:,:,282) * m(:,:)
      rate(:,:,283) = rate(:,:,283) * m(:,:)
      rate(:,:,284) = rate(:,:,284) * m(:,:)
      rate(:,:,285) = rate(:,:,285) * m(:,:)
      rate(:,:,286) = rate(:,:,286) * m(:,:)
      rate(:,:,287) = rate(:,:,287) * m(:,:)
      rate(:,:,288) = rate(:,:,288) * m(:,:)
      rate(:,:,289) = rate(:,:,289) * m(:,:)
      rate(:,:,290) = rate(:,:,290) * m(:,:)
      rate(:,:,291) = rate(:,:,291) * m(:,:)
      rate(:,:,292) = rate(:,:,292) * m(:,:)
      rate(:,:,293) = rate(:,:,293) * m(:,:)
      rate(:,:,294) = rate(:,:,294) * m(:,:)
      rate(:,:,295) = rate(:,:,295) * m(:,:)
      rate(:,:,296) = rate(:,:,296) * m(:,:)
      rate(:,:,297) = rate(:,:,297) * m(:,:)
      rate(:,:,298) = rate(:,:,298) * m(:,:)
      rate(:,:,299) = rate(:,:,299) * m(:,:)
      rate(:,:,300) = rate(:,:,300) * m(:,:)
      rate(:,:,301) = rate(:,:,301) * m(:,:)
      rate(:,:,302) = rate(:,:,302) * m(:,:)
      rate(:,:,303) = rate(:,:,303) * m(:,:)
      rate(:,:,304) = rate(:,:,304) * m(:,:)
      rate(:,:,305) = rate(:,:,305) * m(:,:)
      rate(:,:,306) = rate(:,:,306) * m(:,:)
      rate(:,:,307) = rate(:,:,307) * m(:,:)
      rate(:,:,308) = rate(:,:,308) * m(:,:)
      rate(:,:,309) = rate(:,:,309) * m(:,:)
      rate(:,:,310) = rate(:,:,310) * m(:,:)
      rate(:,:,311) = rate(:,:,311) * m(:,:)
      rate(:,:,312) = rate(:,:,312) * m(:,:)
      rate(:,:,313) = rate(:,:,313) * m(:,:)
      rate(:,:,314) = rate(:,:,314) * m(:,:)
      rate(:,:,315) = rate(:,:,315) * m(:,:)
      rate(:,:,316) = rate(:,:,316) * m(:,:)
      rate(:,:,317) = rate(:,:,317) * m(:,:)
      rate(:,:,318) = rate(:,:,318) * m(:,:)
      rate(:,:,319) = rate(:,:,319) * m(:,:)
      rate(:,:,320) = rate(:,:,320) * m(:,:)
      rate(:,:,321) = rate(:,:,321) * m(:,:)
      rate(:,:,322) = rate(:,:,322) * m(:,:)
      rate(:,:,323) = rate(:,:,323) * m(:,:)
      rate(:,:,324) = rate(:,:,324) * m(:,:)
      rate(:,:,325) = rate(:,:,325) * m(:,:)
      rate(:,:,326) = rate(:,:,326) * m(:,:)
      rate(:,:,327) = rate(:,:,327) * m(:,:)
      rate(:,:,328) = rate(:,:,328) * m(:,:)
      rate(:,:,329) = rate(:,:,329) * m(:,:)
      rate(:,:,330) = rate(:,:,330) * m(:,:)
      rate(:,:,331) = rate(:,:,331) * m(:,:)
      rate(:,:,332) = rate(:,:,332) * m(:,:)
      rate(:,:,333) = rate(:,:,333) * m(:,:)
      rate(:,:,334) = rate(:,:,334) * m(:,:)
      rate(:,:,335) = rate(:,:,335) * m(:,:)
      rate(:,:,336) = rate(:,:,336) * m(:,:)
      rate(:,:,337) = rate(:,:,337) * m(:,:)
      rate(:,:,338) = rate(:,:,338) * m(:,:)
      rate(:,:,339) = rate(:,:,339) * m(:,:)
      rate(:,:,340) = rate(:,:,340) * m(:,:)
      rate(:,:,341) = rate(:,:,341) * m(:,:)
      rate(:,:,342) = rate(:,:,342) * m(:,:)
      rate(:,:,343) = rate(:,:,343) * m(:,:)
      rate(:,:,344) = rate(:,:,344) * m(:,:)
      rate(:,:,345) = rate(:,:,345) * m(:,:)
      rate(:,:,346) = rate(:,:,346) * m(:,:)
      rate(:,:,347) = rate(:,:,347) * m(:,:)
      rate(:,:,348) = rate(:,:,348) * m(:,:)
      rate(:,:,349) = rate(:,:,349) * m(:,:)
      rate(:,:,350) = rate(:,:,350) * m(:,:)
      rate(:,:,351) = rate(:,:,351) * m(:,:)
      rate(:,:,352) = rate(:,:,352) * m(:,:)
      rate(:,:,354) = rate(:,:,354) * m(:,:)
      rate(:,:,355) = rate(:,:,355) * m(:,:)
      rate(:,:,356) = rate(:,:,356) * m(:,:)
      rate(:,:,357) = rate(:,:,357) * m(:,:)
      rate(:,:,358) = rate(:,:,358) * m(:,:)
      rate(:,:,359) = rate(:,:,359) * m(:,:)
      rate(:,:,360) = rate(:,:,360) * m(:,:)
      rate(:,:,361) = rate(:,:,361) * m(:,:)
      rate(:,:,362) = rate(:,:,362) * m(:,:)
      rate(:,:,363) = rate(:,:,363) * m(:,:)
      rate(:,:,367) = rate(:,:,367) * m(:,:)
      rate(:,:,369) = rate(:,:,369) * m(:,:)
      rate(:,:,371) = rate(:,:,371) * m(:,:)
      rate(:,:,373) = rate(:,:,373) * m(:,:)
      rate(:,:,375) = rate(:,:,375) * m(:,:)
      rate(:,:,376) = rate(:,:,376) * m(:,:)
      rate(:,:,377) = rate(:,:,377) * m(:,:)
      rate(:,:,378) = rate(:,:,378) * m(:,:)
      rate(:,:,379) = rate(:,:,379) * m(:,:)
      rate(:,:,384) = rate(:,:,384) * m(:,:)
      rate(:,:,385) = rate(:,:,385) * m(:,:)
      rate(:,:,387) = rate(:,:,387) * m(:,:)
      rate(:,:,388) = rate(:,:,388) * m(:,:)
      rate(:,:,389) = rate(:,:,389) * m(:,:)
      rate(:,:,391) = rate(:,:,391) * m(:,:)
      rate(:,:,392) = rate(:,:,392) * m(:,:)
      rate(:,:,393) = rate(:,:,393) * m(:,:)
      rate(:,:,395) = rate(:,:,395) * m(:,:)
      rate(:,:,396) = rate(:,:,396) * m(:,:)
      rate(:,:,397) = rate(:,:,397) * m(:,:)
      rate(:,:,398) = rate(:,:,398) * m(:,:)
      rate(:,:,399) = rate(:,:,399) * m(:,:)
      rate(:,:,400) = rate(:,:,400) * m(:,:)
      rate(:,:,401) = rate(:,:,401) * m(:,:)
      rate(:,:,402) = rate(:,:,402) * m(:,:)
      rate(:,:,403) = rate(:,:,403) * m(:,:)
      rate(:,:,404) = rate(:,:,404) * m(:,:)
      rate(:,:,405) = rate(:,:,405) * m(:,:)
      rate(:,:,406) = rate(:,:,406) * m(:,:)
      rate(:,:,407) = rate(:,:,407) * m(:,:)
      rate(:,:,408) = rate(:,:,408) * m(:,:)
      rate(:,:,409) = rate(:,:,409) * m(:,:)
      rate(:,:,410) = rate(:,:,410) * m(:,:)
      rate(:,:,411) = rate(:,:,411) * m(:,:)
      rate(:,:,412) = rate(:,:,412) * m(:,:)
      rate(:,:,413) = rate(:,:,413) * m(:,:)
      rate(:,:,414) = rate(:,:,414) * m(:,:)
      rate(:,:,415) = rate(:,:,415) * m(:,:)
      rate(:,:,416) = rate(:,:,416) * m(:,:)
      rate(:,:,417) = rate(:,:,417) * m(:,:)
      rate(:,:,418) = rate(:,:,418) * m(:,:)
      rate(:,:,419) = rate(:,:,419) * m(:,:)
      rate(:,:,420) = rate(:,:,420) * m(:,:)
      rate(:,:,421) = rate(:,:,421) * m(:,:)
      rate(:,:,422) = rate(:,:,422) * m(:,:)
      rate(:,:,423) = rate(:,:,423) * m(:,:)
      rate(:,:,424) = rate(:,:,424) * m(:,:)
      rate(:,:,425) = rate(:,:,425) * m(:,:)
      rate(:,:,426) = rate(:,:,426) * m(:,:)
      rate(:,:,427) = rate(:,:,427) * m(:,:)
      rate(:,:,428) = rate(:,:,428) * m(:,:)
      rate(:,:,429) = rate(:,:,429) * m(:,:)
      rate(:,:,430) = rate(:,:,430) * m(:,:)
      rate(:,:,431) = rate(:,:,431) * m(:,:)
      rate(:,:,432) = rate(:,:,432) * m(:,:)
      rate(:,:,433) = rate(:,:,433) * m(:,:)
      rate(:,:,434) = rate(:,:,434) * m(:,:)
      rate(:,:,435) = rate(:,:,435) * m(:,:)
      rate(:,:,436) = rate(:,:,436) * m(:,:)
      rate(:,:,437) = rate(:,:,437) * m(:,:)
      rate(:,:,438) = rate(:,:,438) * m(:,:)
      rate(:,:,439) = rate(:,:,439) * m(:,:)
      rate(:,:,440) = rate(:,:,440) * m(:,:)
      rate(:,:,441) = rate(:,:,441) * m(:,:)
      rate(:,:,442) = rate(:,:,442) * m(:,:)
      rate(:,:,445) = rate(:,:,445) * m(:,:)
      rate(:,:,446) = rate(:,:,446) * m(:,:)
      rate(:,:,447) = rate(:,:,447) * m(:,:)
      rate(:,:,448) = rate(:,:,448) * m(:,:)
      rate(:,:,449) = rate(:,:,449) * m(:,:)
      rate(:,:,450) = rate(:,:,450) * m(:,:)
      rate(:,:,451) = rate(:,:,451) * m(:,:)
      rate(:,:,452) = rate(:,:,452) * m(:,:)
      rate(:,:,453) = rate(:,:,453) * m(:,:)
      rate(:,:,454) = rate(:,:,454) * m(:,:)
      rate(:,:,455) = rate(:,:,455) * m(:,:)
      rate(:,:,456) = rate(:,:,456) * m(:,:)
      rate(:,:,457) = rate(:,:,457) * m(:,:)
      rate(:,:,458) = rate(:,:,458) * m(:,:)
      rate(:,:,459) = rate(:,:,459) * m(:,:)
      rate(:,:,460) = rate(:,:,460) * m(:,:)
      rate(:,:,461) = rate(:,:,461) * m(:,:)
      rate(:,:,462) = rate(:,:,462) * m(:,:)
      rate(:,:,463) = rate(:,:,463) * m(:,:)
      rate(:,:,464) = rate(:,:,464) * m(:,:)
      rate(:,:,465) = rate(:,:,465) * m(:,:)
      rate(:,:,466) = rate(:,:,466) * m(:,:)
      rate(:,:,467) = rate(:,:,467) * m(:,:)
      rate(:,:,468) = rate(:,:,468) * m(:,:)
      rate(:,:,469) = rate(:,:,469) * m(:,:)
      rate(:,:,470) = rate(:,:,470) * m(:,:)
      rate(:,:,471) = rate(:,:,471) * m(:,:)
      rate(:,:,472) = rate(:,:,472) * m(:,:)
      rate(:,:,473) = rate(:,:,473) * m(:,:)
      rate(:,:,474) = rate(:,:,474) * m(:,:)
      rate(:,:,475) = rate(:,:,475) * m(:,:)
      rate(:,:,476) = rate(:,:,476) * m(:,:)
      rate(:,:,477) = rate(:,:,477) * m(:,:)
      rate(:,:,478) = rate(:,:,478) * m(:,:)
      rate(:,:,479) = rate(:,:,479) * m(:,:)
      rate(:,:,481) = rate(:,:,481) * m(:,:)
      rate(:,:,482) = rate(:,:,482) * m(:,:)
      rate(:,:,483) = rate(:,:,483) * m(:,:)
      rate(:,:,484) = rate(:,:,484) * m(:,:)
      rate(:,:,485) = rate(:,:,485) * m(:,:)
      rate(:,:,486) = rate(:,:,486) * m(:,:)
      rate(:,:,487) = rate(:,:,487) * m(:,:)
      rate(:,:,488) = rate(:,:,488) * m(:,:)
      rate(:,:,489) = rate(:,:,489) * m(:,:)
      rate(:,:,490) = rate(:,:,490) * m(:,:)
      rate(:,:,491) = rate(:,:,491) * m(:,:)
      rate(:,:,492) = rate(:,:,492) * m(:,:)
      rate(:,:,493) = rate(:,:,493) * m(:,:)
      rate(:,:,494) = rate(:,:,494) * m(:,:)
      rate(:,:,495) = rate(:,:,495) * m(:,:)
      rate(:,:,496) = rate(:,:,496) * m(:,:)
      rate(:,:,497) = rate(:,:,497) * m(:,:)
      rate(:,:,498) = rate(:,:,498) * m(:,:)
      rate(:,:,499) = rate(:,:,499) * m(:,:)
      rate(:,:,500) = rate(:,:,500) * m(:,:)
      rate(:,:,501) = rate(:,:,501) * m(:,:)
      rate(:,:,502) = rate(:,:,502) * m(:,:)
      rate(:,:,503) = rate(:,:,503) * m(:,:)
      rate(:,:,504) = rate(:,:,504) * m(:,:)
      rate(:,:,505) = rate(:,:,505) * m(:,:)
      rate(:,:,506) = rate(:,:,506) * m(:,:)
      rate(:,:,507) = rate(:,:,507) * m(:,:)
      rate(:,:,508) = rate(:,:,508) * m(:,:)
      rate(:,:,509) = rate(:,:,509) * m(:,:)
      rate(:,:,510) = rate(:,:,510) * m(:,:)
      rate(:,:,511) = rate(:,:,511) * m(:,:)
      rate(:,:,512) = rate(:,:,512) * m(:,:)
      rate(:,:,513) = rate(:,:,513) * m(:,:)
      rate(:,:,514) = rate(:,:,514) * m(:,:)
      rate(:,:,515) = rate(:,:,515) * m(:,:)
      rate(:,:,516) = rate(:,:,516) * m(:,:)
      rate(:,:,517) = rate(:,:,517) * m(:,:)
      rate(:,:,518) = rate(:,:,518) * m(:,:)
      rate(:,:,519) = rate(:,:,519) * m(:,:)
      rate(:,:,520) = rate(:,:,520) * m(:,:)
      rate(:,:,521) = rate(:,:,521) * m(:,:)
      rate(:,:,522) = rate(:,:,522) * m(:,:)
      rate(:,:,523) = rate(:,:,523) * m(:,:)
      rate(:,:,524) = rate(:,:,524) * m(:,:)
      rate(:,:,525) = rate(:,:,525) * m(:,:)
      rate(:,:,526) = rate(:,:,526) * m(:,:)
      rate(:,:,527) = rate(:,:,527) * m(:,:)
      rate(:,:,528) = rate(:,:,528) * m(:,:)
      rate(:,:,529) = rate(:,:,529) * m(:,:)
      rate(:,:,530) = rate(:,:,530) * m(:,:)
      rate(:,:,531) = rate(:,:,531) * m(:,:)
      rate(:,:,532) = rate(:,:,532) * m(:,:)
      rate(:,:,533) = rate(:,:,533) * m(:,:)
      rate(:,:,534) = rate(:,:,534) * m(:,:)
      rate(:,:,535) = rate(:,:,535) * m(:,:)
      rate(:,:,536) = rate(:,:,536) * m(:,:)
      rate(:,:,542) = rate(:,:,542) * m(:,:)
      rate(:,:,547) = rate(:,:,547) * m(:,:)
      rate(:,:,548) = rate(:,:,548) * m(:,:)
      rate(:,:,549) = rate(:,:,549) * m(:,:)
      rate(:,:,552) = rate(:,:,552) * m(:,:)
      rate(:,:,553) = rate(:,:,553) * m(:,:)
      rate(:,:,554) = rate(:,:,554) * m(:,:)
      rate(:,:,557) = rate(:,:,557) * m(:,:)
      rate(:,:,561) = rate(:,:,561) * m(:,:)
      rate(:,:,562) = rate(:,:,562) * m(:,:)
      rate(:,:,563) = rate(:,:,563) * m(:,:)
      rate(:,:,564) = rate(:,:,564) * m(:,:)
      rate(:,:,565) = rate(:,:,565) * m(:,:)
      rate(:,:,566) = rate(:,:,566) * m(:,:)
      rate(:,:,567) = rate(:,:,567) * m(:,:)
      rate(:,:,568) = rate(:,:,568) * m(:,:)
      rate(:,:,569) = rate(:,:,569) * m(:,:)
      rate(:,:,570) = rate(:,:,570) * m(:,:)
      rate(:,:,572) = rate(:,:,572) * m(:,:)
      rate(:,:,573) = rate(:,:,573) * m(:,:)
      rate(:,:,575) = rate(:,:,575) * m(:,:)
      rate(:,:,576) = rate(:,:,576) * m(:,:)
      rate(:,:,577) = rate(:,:,577) * m(:,:)
      rate(:,:,579) = rate(:,:,579) * m(:,:)
      rate(:,:,580) = rate(:,:,580) * m(:,:)
      rate(:,:,581) = rate(:,:,581) * m(:,:)
      rate(:,:,582) = rate(:,:,582) * m(:,:)
      rate(:,:,585) = rate(:,:,585) * m(:,:)
      end subroutine adjrxt
      end module mo_adjrxt
